home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_metamail.idb / usr / freeware / bin / getfilename.z / getfilename
Encoding:
Text File  |  1999-07-16  |  285 b   |  17 lines

  1. #!/bin/csh -fb
  2. # (The "-fb" might need to be changed to "-f" on some systems)
  3. #
  4.  
  5. echo -n "Enter the name of a file in '$1' format: "
  6. set fnam=$<
  7. if ("" == "$fnam") then
  8.     echo Aborted
  9.     exit -1
  10. endif
  11. if (! -r  $fnam) then
  12.     echo No such file
  13.     exit -1
  14. endif
  15. cp $fnam $2
  16. exit 0
  17.